home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Franz PD / Franz PD Disk #093 (1990-10)(Amiga User Group Deutschland e.V.).zip / Franz PD Disk #093 (1990-10)(Amiga User Group Deutschland e.V.).adf / Manual / Texte / CoreWars4.5 / CoreWars4.5
Text File  |  1990-09-11  |  1KB  |  69 lines
  1.  
  2. --VB0
  3. --OZ1 11 topaz.font
  4. --OZ2 18 Bocklin.font
  5. --OZ3 27 bocklin.font
  6. --DF titelb
  7. --FF31
  8. --ZS2
  9. --SA0
  10. --PA
  11. --SA1
  12. --ZS0
  13. --FF21
  14. DEFEND
  15. --DF titelc
  16. --FF31
  17. --ZS1
  18. --SA0
  19. --PA
  20. --SA1
  21. --ZS0
  22. --FF21
  23. DEFEND
  24. --DF titelchen
  25. --FF31
  26. --ZS0
  27. --PA
  28. --ZS0
  29. --FF21
  30. DEFEND
  31. --DF climode
  32. --FF00
  33. --PA
  34. --FF21
  35. DEFEND
  36. --FF31
  37. --ZS3
  38. --SA0
  39. 4.5  Dampfwalze
  40. --SA1
  41. --ZS0
  42. --FF21
  43.  
  44. --FF00
  45. quelle          DAT 0                   ; Zähler für Kopierroutine
  46. start           MOV #9, quelle          ; Initialiseren
  47. clear           MOV #1, @ziel           ; Löschen
  48.                 SUB #7, ziel
  49.                 JMN clear, ziel
  50.                 MOV #778, ziel
  51. copy            MOV @quelle, <ziel      ; Kopieren
  52.                 DJN copy, quelle
  53.                 JMP @ziel
  54. ziel            DAT 777
  55. --FF21
  56.  
  57. `Dampfwalze'  beschreibt  in einem Bereich von 777 Speicherzellen über seiner
  58. letzten  Anweisung  `ziel'  jede  siebte  Zelle  mit einer `DAT 1'-Anweisung.
  59. Danach  kopiert  es  sich  in einem zwei Zeilen umfassenden Teil wiederum 777
  60. Speicherzellen  hinter  seine letzte Anweisung und übergibt die Ausführung an
  61. die Kopie, bei der der Zyklus wieder von neuem beginnt.
  62.  
  63. Der  interessante  Teil  in  `Dampfwalze'  ist  die Kopierroutine, die wie in
  64. `Mice'  nur  zwei Zeilen lang ist.  Obwohl das Programm länger als `Mice' ist
  65. und  während des ganzen Kampfes nur einen Programmzeiger beschäftigt, gewinnt
  66. es  relativ  häufig  gegen  stationäre Programme wie `Gnom', `Mausefalle' und
  67. `Killer4' (siehe dazu Beschreibung von `Killer4').
  68.  
  69.